home *** CD-ROM | disk | FTP | other *** search
/ Best of Blender - The Int…e Entertainment Magazine / The Best of Blender Magazine.ISO / pc / blender / files / mumetal.dir / 00014.ls < prev    next >
Encoding:
Text File  |  1996-05-01  |  1.2 KB  |  55 lines
  1. on exitFrame
  2.   global n, test
  3.   if rollOver(15) then
  4.     set the visible of sprite 41 to 1
  5.   else
  6.     set the visible of sprite 41 to 0
  7.   end if
  8.   if rollOver(16) then
  9.     set the visible of sprite 42 to 1
  10.   else
  11.     set the visible of sprite 42 to 0
  12.   end if
  13.   if rollOver(17) then
  14.     puppetSprite(17, 1)
  15.     if the castNum of sprite 17 = 21 then
  16.       set the castNum of sprite 17 to 22
  17.     else
  18.       set the castNum of sprite 17 to 21
  19.     end if
  20.   else
  21.     puppetSprite(17, 0)
  22.   end if
  23.   if rollOver(18) then
  24.     puppetSprite(18, 1)
  25.     if the castNum of sprite 18 = 23 then
  26.       set the castNum of sprite 18 to 24
  27.     else
  28.       set the castNum of sprite 18 to 23
  29.     end if
  30.   else
  31.     puppetSprite(18, 0)
  32.   end if
  33.   repeat with n = 23 down to 21
  34.     if rollOver(n) then
  35.       puppetSprite(n, 1)
  36.       set the ink of sprite n to 4
  37.       next repeat
  38.     end if
  39.     set the ink of sprite n to 8
  40.     puppetSprite(n, 0)
  41.   end repeat
  42.   set test to 0
  43.   repeat with n = 36 down to 35
  44.     if the visible of sprite n = 1 then
  45.       set test to test + 1
  46.     end if
  47.   end repeat
  48.   if test > 0 then
  49.     set the visible of sprite 41 to 0
  50.     set the visible of sprite 42 to 0
  51.   end if
  52.   go(the frame)
  53.   updateStage()
  54. end
  55.